Listing 1. Script for Information Screen (Page 2)on PageOpenbegin ' Activate default Select button click on button id 36endon PageClosebegin global BrushDir, Day1ABr, Day2ABr, Day3ABr, Day4ABr, Day5ABr ' Put directory and filenames into global variables for use by page 1 put strdir(object "Select an AnimBrush") into BrushDir put textfield "Day1AnimBrush" into Day1ABr put textfield "Day2AnimBrush" into Day2ABr put textfield "Day3AnimBrush" into Day3ABr put textfield "Day4AnimBrush" into Day4ABr put textfield "Day5AnimBrush" into Day5ABr 'Create an array of day names put "SUN, MON, TUE, WED, THU, FRI, SAT" into NameOfDays 'Initialize current day - add one because selector returns 0-6 put (selector "The Five Days")+1 into CurDay 'Loop 5 times, inserting day names, and high and low temps on page 1 for i = 1 to 5 begin put "Day"&i&"High" into FirstName put "Day"&i&"Low" into SecondName put textfield FirstName into textfield FirstName of page 1 put textfield SecondName into textfield SecondName of page 1 put item CurDay of NameOfDays into textfield ("DayName"&i) of page 1 put CurDay%7+1 into CurDay endend≡å||╞||>o ⌠ ≤° ⁿ≤8>>■yââ9ââτ┴É ┘ ┘ ┘ ⌠ 0■6
